(import modelo.*)
(deftemplate Movil (declare (from-class Movil)))

(defrule seleccionaSegmentoAltoCamara
    ?p <- (Movil {segmentoCamara <> alto && segmentoCamara <> nil})
    =>
    (retract ?p))